home *** CD-ROM | disk | FTP | other *** search
/ Aminet 37 / Aminet 37 (2000)(Schatztruhe)[!][Jun 2000].iso / Aminet / dev / cross / Avr.lha / Atmel / INCCT_Programmer / Src / gadget.c < prev    next >
C/C++ Source or Header  |  1999-11-02  |  11KB  |  455 lines
  1. /***************************************************************************/
  2. /* INCCT GUI V1.00                                                         */
  3. /* A quickly put together GUI for the Atmel in circuit programmer.         */
  4. /* 1999 LJS                                                                */
  5. /***************************************************************************/
  6.  
  7. #define INTUI_V36_NAMES_ONLY
  8.  
  9. #include <exec/types.h>
  10. #include <exec/io.h>
  11. #include <exec/memory.h>
  12. #include <dos/dos.h>
  13. #include <devices/parallel.h>
  14. #include <intuition/intuition.h>
  15. #include <intuition/gadgetclass.h>
  16. #include <libraries/gadtools.h>
  17.  
  18. #include <clib/exec_protos.h>
  19. #include <clib/graphics_protos.h>
  20. #include <clib/intuition_protos.h>
  21. #include <clib/gadtools_protos.h>
  22. #include <clib/alib_protos.h>
  23.  
  24. #include <stdio.h>
  25.  
  26. #include "globdefs.h"
  27.  
  28. #define MYGAD_STRING1   (1)
  29. #define MYGAD_FILENAME  (2)
  30. #define MYGAD_BUTTON    (3)
  31. #define MYGAD_PROGRAM   (4)
  32. #define MYGAD_LOCK      (5)
  33. #define MYGAD_READF     (6)
  34. #define MYGAD_EEPROM    (7)
  35. #define MAXGADS 8           /*number of gadgets + 1*/
  36.  
  37. void errorMessage(STRPTR error);
  38. VOID handleGadgetEvent(struct Window *win, struct Gadget *gad, UWORD code,
  39.     struct Gadget *my_gads[]);
  40. VOID handleVanillaKey(struct Window *win, UWORD code,
  41.     struct Gadget *my_gads[]);
  42. struct Gadget *createAllGadgets(struct Gadget **glistptr, void *vi,
  43.     UWORD topborder, struct Gadget *my_gads[]);
  44. VOID process_window_events(struct Window *mywin, struct Gadget *my_gads[]);
  45. VOID gadtoolsWindow(VOID);
  46. void StartProgram(BYTE X);
  47. void StartRead(void);
  48. void FreeParallel(void);
  49. int SaveParallel(void);
  50.  
  51. extern char FileName[];
  52. char Lock=0;
  53.  
  54. struct EasyStruct myES = {
  55.     sizeof(struct EasyStruct),
  56.     0,
  57.     "Error",
  58.     "%s",
  59.     "OK"
  60. };
  61.  
  62. struct TextAttr Topaz80 = { "topaz.font", 8, 0, 0, };
  63.  
  64. struct Library      *IntuitionBase;
  65. struct Library      *GfxBase;
  66. struct Library      *GadToolsBase;
  67. struct MsgPort      *ParallelMP=NULL; 
  68. struct IOExtPar     *ParallelIO=NULL; 
  69.  
  70. int main(int argc, char *argv[])
  71. {
  72.  
  73.   FileName[0]=0;
  74.     
  75. if (NULL == (IntuitionBase = OpenLibrary("intuition.library", 37)))
  76. { 
  77.   printf("Can't open intuition.library V37 !!!!\n");
  78.    /*What else can we do?*/
  79. }
  80. else
  81. {
  82.   if(!create_timer())
  83.     errorMessage( "Can't open timer.device");
  84.   else
  85.   {
  86.     if(!SaveParallel())
  87.       errorMessage("Can't open parallel.device");    
  88.     else
  89.     {
  90.       if (NULL == (GfxBase = OpenLibrary("graphics.library", 37)))
  91.         errorMessage( "Requires V37 graphics.library");
  92.       else
  93.       {
  94.         if (NULL == (GadToolsBase = OpenLibrary("gadtools.library", 37)))
  95.           errorMessage( "Requires V37 gadtools.library");
  96.         else
  97.         {
  98.           if(argc>1)
  99.           {
  100.             Program_It(argc,argv);
  101.           }
  102.           else
  103.           {
  104.             gadtoolsWindow();
  105.           }
  106.           CloseLibrary(GadToolsBase);
  107.         }
  108.         CloseLibrary(GfxBase);
  109.       }
  110.       CloseDevice((struct IORequest *)ParallelIO);
  111.       FreeParallel();
  112.     }
  113.     delete_timer();
  114.   }
  115.   CloseLibrary(IntuitionBase);
  116. }
  117.   return 1;
  118. }
  119.  
  120.  
  121. void errorMessage(STRPTR error)
  122. {
  123.   if (error)
  124.   {
  125.     EasyRequest(NULL, &myES, NULL, error);
  126.   }
  127. }
  128.  
  129. VOID handleGadgetEvent(struct Window *win, struct Gadget *gad, UWORD code,
  130.     struct Gadget *my_gads[])
  131. {
  132.   switch (gad->GadgetID)
  133.   {
  134.     case MYGAD_FILENAME:
  135.         strcpy(FileName,  ((struct StringInfo *)gad->SpecialInfo)->Buffer);
  136.         break;
  137.  
  138.     case MYGAD_BUTTON: if (FileRequest())
  139.                        {
  140.                         GT_SetGadgetAttrs(my_gads[MYGAD_FILENAME], win, NULL,
  141.                             GTST_String,   FileName,
  142.                             TAG_END);
  143.                        }
  144.                       break;
  145.  
  146.     case MYGAD_PROGRAM:
  147.          StartProgram(1);
  148.          break;
  149.  
  150.     case MYGAD_READF:
  151.           StartRead();
  152.           break;
  153.  
  154.     case MYGAD_EEPROM:
  155.          StartProgram(2);
  156.          break;
  157.  
  158.     case MYGAD_LOCK:
  159.          {
  160.            Lock^=1;
  161.          }
  162.          break;
  163.   }
  164. }
  165.  
  166.  
  167. VOID handleVanillaKey(struct Window *win, UWORD code, struct Gadget *my_gads[])
  168. {
  169.  
  170.   switch (code)
  171.   {
  172.     case 's':
  173.     case 'S':
  174.         ActivateGadget(my_gads[MYGAD_FILENAME], win, NULL);
  175.         break;
  176.  
  177.     case 'w':
  178.     case 'W':
  179.          StartProgram(2);
  180.          break;
  181.  
  182.     case 'c':
  183.     case 'C':
  184.          if (FileRequest())
  185.          {
  186.            GT_SetGadgetAttrs(my_gads[MYGAD_FILENAME], win, NULL,
  187.                              GTST_String,   FileName,
  188.                             TAG_END);
  189.          }
  190.         break;
  191.     case 'l':
  192.     case 'L':
  193.         Lock^=1;
  194.         if(Lock)
  195.         {
  196.           GT_SetGadgetAttrs(my_gads[MYGAD_LOCK],win,NULL,GTCB_Checked,TRUE,TAG_END);
  197.         }
  198.         else
  199.         {
  200.           GT_SetGadgetAttrs(my_gads[MYGAD_LOCK],win,NULL,GTCB_Checked,FALSE,TAG_END);
  201.         }
  202.         break;
  203.     case 'p':
  204.     case 'P':
  205.         StartProgram(1);
  206.         break;
  207.   
  208.     case 'r':
  209.     case 'R':
  210.         StartRead();
  211.         break;
  212.   }
  213. }
  214.  
  215.  
  216. struct Gadget *createAllGadgets(struct Gadget **glistptr, void *vi,
  217.     UWORD topborder, struct Gadget *my_gads[])
  218. {
  219. struct NewGadget ng;
  220. struct Gadget *gad;
  221.  
  222. gad = CreateContext(glistptr);
  223.  
  224. ng.ng_LeftEdge   = 100;
  225. ng.ng_TopEdge    = 10+topborder;
  226. ng.ng_Width      = 200;
  227. ng.ng_Height     = 12;
  228. ng.ng_TextAttr   = &Topaz80;
  229. ng.ng_VisualInfo = vi;
  230. ng.ng_GadgetText = "";
  231. ng.ng_Flags      = NG_HIGHLABEL;
  232. ng.ng_GadgetID   = MYGAD_STRING1;
  233. my_gads[MYGAD_STRING1] = gad = CreateGadget(TEXT_KIND, gad, &ng,
  234.                     GTTX_Text,   "ATMEL In Circuit Programmer.",
  235.                     GTTX_Border, FALSE,
  236.                     TAG_END);
  237.  
  238. ng.ng_TopEdge   += 15;
  239. ng.ng_GadgetText = "_S Record:";
  240. ng.ng_GadgetID   = MYGAD_FILENAME;
  241. my_gads[MYGAD_FILENAME] = gad = CreateGadget(STRING_KIND, gad, &ng,
  242.                     GTST_String,   FileName,
  243.                     GTST_MaxChars, 256,
  244.                     GT_Underscore, '_',
  245.                     TAG_END);
  246.  
  247. ng.ng_TopEdge   += 20;
  248. ng.ng_LeftEdge   = 20;
  249. ng.ng_Width      = 100;
  250. ng.ng_Height     = 12;
  251. ng.ng_GadgetText = "Select _code";
  252. ng.ng_GadgetID   = MYGAD_BUTTON;
  253. ng.ng_Flags      = 0;
  254. my_gads[MYGAD_BUTTON] = gad = CreateGadget(BUTTON_KIND, gad, &ng,
  255.                     GT_Underscore, '_',
  256.                     TAG_END);
  257.  
  258. ng.ng_LeftEdge  += 120;
  259. ng.ng_Width      = 100;
  260. ng.ng_Height     = 12;
  261. ng.ng_GadgetText = "_Program";
  262. ng.ng_GadgetID   = MYGAD_PROGRAM;
  263. my_gads[MYGAD_PROGRAM] = gad = CreateGadget(BUTTON_KIND, gad, &ng,
  264.                     GT_Underscore, '_',
  265.                     TAG_END);
  266.  
  267. ng.ng_LeftEdge  += 170;
  268. ng.ng_Height     = 12;
  269. ng.ng_GadgetText = "_Lock";
  270. ng.ng_GadgetID   = MYGAD_LOCK;
  271. my_gads[MYGAD_LOCK] = gad = CreateGadget(CHECKBOX_KIND, gad, &ng,GT_Underscore, '_',
  272.                     TAG_END);
  273.  
  274. ng.ng_LeftEdge  -= 170;
  275. ng.ng_TopEdge   += 20;
  276. ng.ng_GadgetText = "_Read Flash";
  277. ng.ng_GadgetID   = MYGAD_READF;
  278. my_gads[MYGAD_READF] = gad = CreateGadget(BUTTON_KIND, gad, &ng,
  279.                     GT_Underscore, '_',
  280.                     TAG_END);
  281.  
  282. ng.ng_LeftEdge  -= 120;
  283. ng.ng_GadgetText = "_Write EEPROM";
  284. ng.ng_GadgetID   = MYGAD_EEPROM;
  285. my_gads[MYGAD_EEPROM] = gad = CreateGadget(BUTTON_KIND, gad, &ng,
  286.                     GT_Underscore, '_',
  287.                     TAG_END);
  288.  
  289. return(gad);
  290. }
  291.  
  292. VOID process_window_events(struct Window *mywin, struct Gadget *my_gads[])
  293. {
  294.   struct IntuiMessage *imsg;
  295.   ULONG imsgClass;
  296.   UWORD imsgCode;
  297.   struct Gadget *gad;
  298.   BOOL terminated = FALSE;
  299.  
  300.   while (!terminated)
  301.   {
  302.     Wait (1 << mywin->UserPort->mp_SigBit);
  303.  
  304.     while ( (!terminated) && (imsg = GT_GetIMsg(mywin->UserPort)) )
  305.     {
  306.       gad = (struct Gadget *)imsg->IAddress;
  307.  
  308.       imsgClass = imsg->Class;
  309.       imsgCode = imsg->Code;
  310.  
  311.       GT_ReplyIMsg(imsg);
  312.  
  313.       switch (imsgClass)
  314.       {
  315.         case IDCMP_GADGETDOWN:
  316.        /* case IDCMP_MOUSEMOVE:*/
  317.         case IDCMP_GADGETUP:
  318.                  handleGadgetEvent(mywin, gad, imsgCode, my_gads);
  319.                         break;
  320.         case IDCMP_VANILLAKEY:
  321.                 handleVanillaKey(mywin, imsgCode, my_gads);
  322.                 break;
  323.         case IDCMP_CLOSEWINDOW:
  324.                 terminated = TRUE;
  325.                 break;
  326.         case IDCMP_REFRESHWINDOW:
  327.                 GT_BeginRefresh(mywin);
  328.                 GT_EndRefresh(mywin, TRUE);
  329.                 break;
  330.       }
  331.     }
  332.   }
  333. }
  334.  
  335. VOID gadtoolsWindow(VOID)
  336. {
  337. struct TextFont *font;
  338. struct Screen   *mysc;
  339. struct Window   *mywin;
  340. struct Gadget   *glist, *my_gads[MAXGADS];
  341. void            *vi;
  342. UWORD           topborder;
  343.  
  344. if (NULL == (font = OpenFont(&Topaz80)))
  345.     errorMessage( "Failed to open Topaz 80");
  346. else
  347.     {
  348.     if (NULL == (mysc = LockPubScreen(NULL)))
  349.         errorMessage( "Couldn't lock default public screen");
  350.     else
  351.         {
  352.         if (NULL == (vi = GetVisualInfo(mysc, TAG_END)))
  353.             errorMessage( "GetVisualInfo() failed");
  354.         else
  355.             {
  356.             topborder = mysc->WBorTop + (mysc->Font->ta_YSize + 1);
  357.  
  358.             if (NULL == createAllGadgets(&glist, vi, topborder, my_gads))
  359.                 errorMessage( "createAllGadgets() failed");
  360.             else
  361.                 {
  362.                 if (NULL == (mywin = OpenWindowTags(NULL,
  363.                         WA_Title,     "INCCT "VERSION" ©1999 LJS",
  364.                         WA_Gadgets,   glist,      WA_AutoAdjust,    TRUE,
  365.                         WA_Width,       400,      WA_MinWidth,        50,
  366.                         WA_InnerHeight, 80,       WA_MinHeight,       50,
  367.                         WA_DragBar,    TRUE,      WA_DepthGadget,   TRUE,
  368.                         WA_Activate,   TRUE,      WA_CloseGadget,   TRUE,
  369.                         WA_SizeGadget, FALSE,      WA_SimpleRefresh, TRUE,
  370.                         WA_IDCMP, IDCMP_CLOSEWINDOW | IDCMP_REFRESHWINDOW |
  371.                             IDCMP_VANILLAKEY | SLIDERIDCMP | STRINGIDCMP |
  372.                             BUTTONIDCMP,
  373.                         WA_PubScreen, mysc,
  374.                         TAG_END)))
  375.                     errorMessage( "OpenWindow() failed");
  376.                 else
  377.                     {
  378.                     GT_RefreshWindow(mywin, NULL);
  379.  
  380.                     process_window_events(mywin, my_gads);
  381.  
  382.                     CloseWindow(mywin);
  383.                     }
  384.                 }
  385.             FreeGadgets(glist);
  386.             FreeVisualInfo(vi);
  387.             }
  388.         UnlockPubScreen(NULL, mysc);
  389.         }
  390.     CloseFont(font);
  391.     }
  392. }
  393.  
  394. void StartProgram(BYTE X)
  395. {
  396.   char *Args[3];
  397.   BYTE Aargc=2;
  398.   switch(X)
  399.   {
  400.     case 1:
  401.       if(Lock)
  402.       {
  403.         Args[2]="-l";
  404.         Aargc=3;
  405.       }
  406.       break;
  407.  
  408.     case 2:
  409.       Args[2]="-ee";
  410.       Aargc=3;
  411.       break;
  412.  
  413.     default:
  414.       break;
  415.   }
  416.  
  417.   Args[0]="";
  418.   Args[1]=FileName;
  419.   Program_It(Aargc,Args);
  420. }
  421.  
  422. void StartRead(void)
  423. {
  424.   char *Args[3];
  425.   Args[0]="";
  426.   Args[1]=FileName;
  427.   Args[2]="-r";
  428.   Program_It(3,Args);
  429. }
  430.  
  431. int SaveParallel(void)
  432. {
  433.   if (ParallelMP=CreatePort(0,0) )
  434.   {
  435.     if (ParallelIO=(struct IOExtPar *)
  436.         CreateExtIO(ParallelMP,sizeof(struct IOExtPar)) )
  437.     {
  438.       if (OpenDevice(PARALLELNAME,0L,(struct IORequest *)ParallelIO,0) )
  439.       {
  440.         return 0;
  441.       }
  442.       else
  443.       {
  444.         return 1;
  445.       }
  446.     }
  447.   }
  448. }
  449.  
  450. void FreeParallel(void)
  451. {
  452.   if(ParallelIO) DeleteExtIO((struct IORequest*)ParallelIO);
  453.   if(ParallelMP) DeletePort(ParallelMP);
  454. }
  455.